double complex function cerf(z)
    implicit none
    double complex z

    call CERROR(z,cerf)

end function cerf
